home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib05.dsk / STRING SWAP DEMO.bas < prev    next >
Encoding:
BASIC Source File  |  1990-01-01  |  173 b   |  7 lines
  1. 10  PRINT  CHR$(4);"BLOAD STRING SWAP"
  2. 20  POKE 1013,76: POKE 1014,0: POKE 1015,3
  3. 30 A$ = "STRING VALUE A"
  4. 40 B$ = "STRING VALUE B"
  5. 50  & SWAP,A$,B$
  6. 60  PRINT A$,B$
  7. 70  END